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NN NN CCCCCCCC PPPPPPPP SSSSSSSS TTTTTITITT AAAAAA LL 000000 GGGGGGGG 

NN NN CCCCCCCC =PPPPPPPP SSSSSSSS TTTTITTITT AAAAAA LL 000000 GGGGGGGG 

NN NN CC PP PP SS TT AA AA LL 00 00 GG 

NN NN CC PP PP SS TT Ah AA LL 00 00 GG 

NNNN NN CC PP PP SS TT BA AA LL 00 00 GG 

NNNN NN CC PP PP SS TT AA AA LL 00 00 GG 

NN WN WN CC PPPPPPPP SSSSSS TT BA AA LL 00 00 GG 

NN cc PPPPPPPP SSSSSS TT AA AA LL 00 00 GG 

NN NNNN CC PP SS TT AAAAAAAAAA LL 00 00 GG GGG6GGG 

NN cc PP $$ TT AAAAAAAAAA LL 00 00 GG G6GG6GG6G 

NN NN CC PP S$ TT AA AA LL 00 00 GG GG eves 
NN NN CC PP SS TT AA AA LL 00 00 GG GG coe 
NN NN CCCCCCCC =~PP SSSSSSSS TT AA AA LLLLLLLLLL 000000 GGGGGG cece 
NN NN cccccccc PP SSSSSSSS TT AA AA LLLLLLLLLL 000000 GGGGGG eoee 
LL. III] SSSSSSSS 
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Logging Parameter Parse States and Data 16-Sep-1984 139: Se AX-11 Bliss-32 V4.0-74 P 1 
oom 13x80 p=13be 9828s. AMEE ees Fe Me O35 44 age 4) 
ZTITLE boggin Parameter Uaree preter and Data’ 
eoPLe NCPSTALOG (IDENT = ‘'V04-000', LIST(NOOBJECT)) = | 


' 
eRe E RARER AAA AAA E EAA AE TATA eee 


i 4 3 
a 1 ; 
5 5 05 1 3 
3 6 Be 1 * | 
; 7 007 1 !« * 3 
5 8 008 1 !* COPYRIGHT (c) 1978, 1980, 1982, 1984 s ; 
; sy 009 1 !'* DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. * : 
3 1? B19 ! - ALL RIGHTS RESERVED. * : 
Py ° ® e 
: \ pots 1 '® THIS SOFTWARE IS 4g} UNDER A LICENSE AND MAY BE USED AND COPIED ® : 
3 1 1 1 I trad IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * ’ 
oe Bote 1 !* INCLUSION OF iF ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * ; 
H 15 015 1 !* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * . 
3 16 BR18 1 '® OTHER PERSON. NO. TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY ® 
: \ SFA : 4 TRANSFERRED. 
o ° ® 
; 19 4 1 !'® THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
3 20 020 1 !* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
3 $3 On53 : ” CORPORATION. ® 
© ° & 
3 $6 0038 1 !'* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * 
3 24 ose 1 !® SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * 
ae 0025 1 !« * 
; 26 0026 1 !« * 
3 4 of 44 :  SoseonoconsnarososesonesSsoesonooeeSoToNoenSsoSoSonenooaNransoSSaNeoSooToHS 
5 29 0029 1 
s 0 Be QO 1 !++ 
: 1 Ones ’ FACILITY: Network Control Program (NCP) 
; : 6033 1 ! ABSTRACT: 
: 4 ite 1 
3 H Bo ee : States and data for the parsing of NCP logging parameters 
; 38 tt : ENVIRONMENT: VAX/VMS Operating System 
: 39 0039 1 | AUTHOR: Darrell Duffy , CREATION DATE: 10-September-79 
; 60 0040 1! 
; 0041 1 ' MODIFIED BY: 
3 1: ote 1 i | 
oe 043 1! v03-002 RPGO002 Bob Grosso 26-Feb-1983 
: rt} bee } Rename ESMO to MODPRM, | 
: 46 046 1 i v03-001 RPGO0O1 Bob Gro 23-Feb-1983 | 
3 44 be : Add LOG MONITOR MODULE. ¢x25-PROT.X25-SERVER.X 9-SERVER). 
: 49 049 1! v002 TMHOO02 Tim Halvorsen 11-Nov-1981 
; 20 B20 ' Allow a circuit source as well as Line and node. 
; 52 26 1 i v001 TMHO001 Tim Halvorsen 22-Jun-1981 
. 3% 0053 1! Change BUILD_SDB reference to use full entity type field. 
: 54 0054 1 ie- | 
| 
| 
} 


3 § 5 ! ZSBTTL ‘Definitions’ 

: : 087 1 

3 8 1 ! INCLUDE FILES: 

; 60 1! 

i >| ? 1 

rc? @ 1 LIBRARY 'LIBS:NMA 
H 6 O66 1 LIBRARY ‘LIB$:NCP 
3; & 0063 1 LIBRARY ‘SYSSLIBR 
; 65 0064 1 

; 666 0065 1! 

3 67 0 1 ! EXTERNAL REFERENCES: 

; 68 067 1! 

; 69 0068 1 

oe 0069 1 ACT_DFN 


eos 


WEES AAG Logging. + Apap Parse States and Data 


BRY'; 
BRY* 
Y:TP 


1Sseoctgee 99:38:14 


AMAC'; 


! Action routine externals 


3 } 
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V arameter blocks 14-Sep-1984 12:48:24 NCP.SRCIJNCPSTALOG.B32; (3) 


) 
| 
| 
ZSBTTL ‘Parameter blocks’ 


N 
V 


; £ 70 #1 : 
Te 71 1 : 
$ 74 072 1! ; 
, Ore 073 1 !' BIND DATA: : 
re. Boe 1! ‘ 
3 7 075 «#1 : 
3 78 Ba78 1! : 
: 79 077 1! Parameter Blocks : 
>; 680 078 1} : 
; 8) 079 1 : 
; ¢ P 0oORkO 1 BUILD_PCL : 
; P 8 7 a ¢ 
a P 88 1 ‘ 
; 686 P0084 1 STA, NUMB, PCLO_STA, , : 
; «887 P0085 1 , TKN PCLO-LNA, , ; 
; 88 P 0086 1 SNO, NADR, PCLO-SIN, , : 
3 89 P 0087 1 EVL, ESET, PCLO_LEVE, VRB_EVE, ' Event ey ng type stored ‘ 
: 90 P 0088 1 i “in PDBS E : 
; 91 P 0089 1 . END... : 
; 9 P0090 1 : 
s 0091 1 ) 

; 94 0092 1 

; #95 P0093 1 BUILD_PBK 

5 96 P 0094 1 

: 97 P0095 1 (LOG, 

: | «698 P 0096 1 

; 99 P0097 1 EVL. LITB, 0, 

: 100 P0098 1 KNE. LITB. 0. LOG_EVL, 

3 19) P 9089 ' LIN, ESLI. , VRB_EVE, 

3 103 P0101 1 ! ACTSSAVPRM gilt $s sere nengte type MODPRM to store the correct module string in PDB$G_VRB 

> 104 Pp 0108 1 MPR, MODPRM, NCPSC_ENT_MODPRO, V * 

3 105 P0103 1 MSE, MODPRM, NCPSC"ENT_MODSER, VRB ~EVE: 

: 106 P0104 1 M9S, MODPRM, NCPSC"ENT_MOD29S, VRB EVE, 

: 107 P0105 1 

: 108 b Bios 1 NAM, T 

: 109 P0107 1 NOD, E ESNO,” , VRB_EVE, 

; 110 P0108 1 CIR, ESCI, VRB EVE 

: 411 P0109 1 SEX, LITL. 6, LOG_SNO, 

: 19 P0110 1 SNO . 

: 11 P0111 1 STA Lité, ust _STATE_ON, LOG_STA, | 

+ 114 P gig 1 STAOFF, LITB. NMASC STATE OFF, LOG_STA, 

+ 115 P0113 1 STAHLD, LITB, NMASC~STATE-HOL, LOG-STA, 

: 116 P0114 1 

: 11 115 1 ) 

: 118 116 1 

> 119 P0117 1 BUILD_SDB 

: 120 Pp 0118 1 

: 121 119 «#1 


| 
| 
| 
(LOG, NMASC_ENT_LOG, VRB_ENT, LOG) | 
| 
| 
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Yoe bree ot strings 300-138 99: i: My NCP. SRCINCPS STALOG O3001 ° (4) 
> 1 1 1 ZSBTTL ‘Prompt strings’ 

> Z } } rompt strings 

: 18 18§ 4 i Build prompt stri 

Py ; rom strings 
: 188 154 11 Seas ° 

: 1$8 125 1 
; ! $ BIND 

: 131 P0108 1 PROMPT_STRINGS 

: 4 ; P0129 1 (LOG, 

4 Bost | EVK, ‘Event List (cls.typ.typctyp, KNOWN) : 

8 . ‘Even 5 cls. - : ‘e 

s 135 P O01 § 1 NAM, ° Sink name oe Ute 44 ame.typ) 

. 4 P 01 1 MOD, Rodale (X25=PROTOCOL, X2 SSERVER 29-SERVER) . 

: P oi 4 SNK. "Sink mode (NODE node-id, EXECUTOR): ', 

: 139 L 01 6 1 aSTRINGC Source (NODE node-id, LINE J rates mg 

: 140 P 01 1 "CIRCUIT circ-id, MODULE module-name): '), 

> 141 P0138 1 STA, "Sink state (ON. OFF, HOLD): ', 

5 | P0139 1 

: 16 0140 2 ) 

$164 0141 1 ; 
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"State Table for Logging Parameters’ 


SINIT_STATE (NCP$G_STTBL_LOG, NCP$G_KYTBL_LOG); 
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SET/DEFINE LOGGING Parameter States 
ST_LOG, 
TPAS_LAMBDA, , ACTSSAVPRM, , , PBK$G_EVE_ESET) 


( 
( 
) 
(, 
( (SE_ALL), ST LOG, ie ME ALL poregees, 

(TPAS_EOS ACTSPAT Prompt if no keywords 
CTPAS.L LAMBDA, ST stOGe “PRC. ACTSPMi OFF) ! Process keywords 


oo ! Prompt for these parameters 


SRC, EVK, SNK, NAM, STA 


(ST_LOG_D 
CTPRS. 0s. Bas EXIT, ACTSVRB_UTILITY, , , SDB$G_LOG), 


~~ 


NCP.SRCIN STALOG.032; 
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Subexpressions 


SE_EVENT_LIST), TPAS_EXIT, ACTSSAVPRM, , , PBK$G_LOG_EVL), 
(SE_EVENT_KNOWN), TPAS_EXIT, ACTSSAVPRM, , , PBK$G_LOG_EVL), 
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Object ng of Parse Table -Sep-1 NCP. SRCINCPSTALOG.B32; 
; § 12 ZSBTTL ‘Object Listing of Parse Table’ 
; 324 1 END 'End of module 
5 % 0 ELUDOM 


